home *** CD-ROM | disk | FTP | other *** search
/ BBS in a Box 3 / BBS in a box - Trilogy III.iso / Files / Prog / Q-R / QAPict Folder / Main.cp next >
Encoding:
Text File  |  1993-03-29  |  374 b   |  15 lines  |  [TEXT/MPS ]
  1. // Copyright © 1992-1993 Emergent Behavior. All rights reserved.
  2.  
  3. #pragma segment Main
  4. //=============================================================
  5. void
  6. main()
  7. {
  8.     const OSType kFileType = 'PICT';
  9.     const OSType kCreator  = 'QApi';
  10.  
  11.     TApplication::InitToolbox();
  12.     TApplication theApp(kCreator, kFileType);
  13.     theApp.AdoptProtoDocument( new TPictDocument() );
  14.     theApp.Run();
  15. }